home *** CD-ROM | disk | FTP | other *** search
/ Compendium Deluxe 1 / LSD Compendium Deluxe 1.iso / a / intuition / window / welc2205.lha / Examples / test4 < prev    next >
Encoding:
Text File  |  1993-06-16  |  269 b   |  16 lines
  1. /* Welcome and interactivity */
  2. Address WELCOME
  3. Options RESULTS
  4.  
  5. 'ASK "Do you want to install the Fonts?" _Yes _No'
  6.  
  7. IF result THEN DO
  8.     'TEXT NOLINE "Installing Fonts..."'
  9.  
  10.     ADDRESS COMMAND
  11.     'Copy "Install Disk 1:Fonts" FONTS: all'
  12.  
  13.     ADDRESS WELCOME
  14.     'TEXT Ready.'
  15. END
  16.